From b01ebafba32444a9aa0148070124392d9f6ec06f Mon Sep 17 00:00:00 2001 From: Lars Magne Ingebrigtsen Date: Wed, 13 Jul 2011 23:53:41 +0200 Subject: [PATCH] * startup.el (initial-buffer-choice): Add `none' as a choice --- lisp/ChangeLog | 3 +++ lisp/startup.el | 9 ++++++--- 2 files changed, 9 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c2704e95107..aad27a23e07 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2011-07-13 Lars Magne Ingebrigtsen + * startup.el (initial-buffer-choice): Add `none' as a choice + (bug#6234). + * subr.el (add-hook): Clarify section about buffer-local hooks (bug#6218). diff --git a/lisp/startup.el b/lisp/startup.el index c6f3063ca90..66deb11623a 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -41,13 +41,16 @@ (defcustom initial-buffer-choice nil "Buffer to show after starting Emacs. If the value is nil and `inhibit-startup-screen' is nil, show the -startup screen. If the value is string, visit the specified file or -directory using `find-file'. If t, open the `*scratch*' buffer." +startup screen. If the value is string, visit the specified file +or directory using `find-file'. If t, open the `*scratch*' +buffer. If `none', don't select anything, but show the +buffer (if any) selected by the startup file." :type '(choice (const :tag "Startup screen" nil) (directory :tag "Directory" :value "~/") (file :tag "File" :value "~/.emacs") - (const :tag "Lisp scratch buffer" t)) + (const :tag "Lisp scratch buffer" t) + (const :tag "Select no buffer" 'none)) :version "23.1" :group 'initialization) -- 2.30.2